home *** CD-ROM | disk | FTP | other *** search
/ Educational Software Cooperative 4 / Educational Software Cooperative 4.iso / midilang / breath.mpl < prev    next >
Encoding:
Text File  |  1996-02-06  |  1.1 KB  |  72 lines
  1. -21944
  2. #
  3. #
  4. #
  5. #    breath.mpl
  6. #
  7. #    copy chan1 -> Chan2
  8. #       and replace breath control by volume control
  9. #
  10. #      Author            ID                 Date
  11. #    ------------    -----------          ---------
  12. #    Serge Sibony    100417,2633           01/17/96
  13. #      
  14. #
  15. # This file is a mpl effect definition used by MidiLang
  16. #    MidiLang can be found at the MidiForum, in the
  17. #         Windows sound media library.
  18. # 
  19. #
  20. # This effect replays any Note played in channel 1 to the channel 2
  21. # and replace the breath control with the volume control
  22. #
  23. #
  24. # This is an example of the use of the Midi Mapper
  25. #
  26.  
  27. label init
  28. unsavein
  29. end
  30.  
  31. label mapper
  32.  
  33. status!= 0xB0
  34. goto end
  35. #only channel 1
  36.  
  37. data1!= 2
  38. goto out
  39. #only breath control
  40.  
  41. data1= 7
  42.  
  43. # switch to volume control
  44.  
  45. label out
  46.  
  47. # switch to channel 2
  48. status= 0xB1
  49.  
  50. outmidi 
  51.  
  52. label end
  53. end
  54.  
  55.  
  56.  
  57. label main
  58.  
  59. chan!= 1
  60. goto mend
  61. chan= 2
  62. outmidi
  63.  
  64. label mend
  65. end
  66.  
  67.  
  68. descript        breath controller mapping
  69. descript All notes found in channel 1 are copyed to
  70. descript channel 2
  71. descript All breath control are replaced by volume control
  72.